3.550 \(\int \frac{A+B x^3}{(e x)^{7/2} \sqrt{a+b x^3}} \, dx\)
Optimal. Leaf size=246 \[ -\frac{\sqrt{e x} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\sqrt [3]{a}+\left (1+\sqrt{3}\right ) \sqrt [3]{b} x\right )^2}} (2 A b-5 a B) F\left (\cos ^{-1}\left (\frac{\left (1-\sqrt{3}\right ) \sqrt [3]{b} x+\sqrt [3]{a}}{\left (1+\sqrt{3}\right ) \sqrt [3]{b} x+\sqrt [3]{a}}\right )|\frac{1}{4} \left (2+\sqrt{3}\right )\right )}{5 \sqrt [4]{3} a^{4/3} e^4 \sqrt{\frac{\sqrt [3]{b} x \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\sqrt [3]{a}+\left (1+\sqrt{3}\right ) \sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}-\frac{2 A \sqrt{a+b x^3}}{5 a e (e x)^{5/2}} \]
[Out]
(-2*A*Sqrt[a + b*x^3])/(5*a*e*(e*x)^(5/2)) - ((2*A*b - 5*a*B)*Sqrt[e*x]*(a^(1/3)
+ b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/(a^(1/3) + (1 + S
qrt[3])*b^(1/3)*x)^2]*EllipticF[ArcCos[(a^(1/3) + (1 - Sqrt[3])*b^(1/3)*x)/(a^(1
/3) + (1 + Sqrt[3])*b^(1/3)*x)], (2 + Sqrt[3])/4])/(5*3^(1/4)*a^(4/3)*e^4*Sqrt[(
b^(1/3)*x*(a^(1/3) + b^(1/3)*x))/(a^(1/3) + (1 + Sqrt[3])*b^(1/3)*x)^2]*Sqrt[a +
b*x^3])
_______________________________________________________________________________________
Rubi [A] time = 0.460606, antiderivative size = 246, normalized size of antiderivative = 1.,
number of steps used = 3, number of rules used = 3, integrand size = 26, \(\frac{\text{number of rules}}{\text{integrand size}}\) = 0.115
\[ -\frac{\sqrt{e x} \left (\sqrt [3]{a}+\sqrt [3]{b} x\right ) \sqrt{\frac{a^{2/3}-\sqrt [3]{a} \sqrt [3]{b} x+b^{2/3} x^2}{\left (\sqrt [3]{a}+\left (1+\sqrt{3}\right ) \sqrt [3]{b} x\right )^2}} (2 A b-5 a B) F\left (\cos ^{-1}\left (\frac{\left (1-\sqrt{3}\right ) \sqrt [3]{b} x+\sqrt [3]{a}}{\left (1+\sqrt{3}\right ) \sqrt [3]{b} x+\sqrt [3]{a}}\right )|\frac{1}{4} \left (2+\sqrt{3}\right )\right )}{5 \sqrt [4]{3} a^{4/3} e^4 \sqrt{\frac{\sqrt [3]{b} x \left (\sqrt [3]{a}+\sqrt [3]{b} x\right )}{\left (\sqrt [3]{a}+\left (1+\sqrt{3}\right ) \sqrt [3]{b} x\right )^2}} \sqrt{a+b x^3}}-\frac{2 A \sqrt{a+b x^3}}{5 a e (e x)^{5/2}} \]
Antiderivative was successfully verified.
[In] Int[(A + B*x^3)/((e*x)^(7/2)*Sqrt[a + b*x^3]),x]
[Out]
(-2*A*Sqrt[a + b*x^3])/(5*a*e*(e*x)^(5/2)) - ((2*A*b - 5*a*B)*Sqrt[e*x]*(a^(1/3)
+ b^(1/3)*x)*Sqrt[(a^(2/3) - a^(1/3)*b^(1/3)*x + b^(2/3)*x^2)/(a^(1/3) + (1 + S
qrt[3])*b^(1/3)*x)^2]*EllipticF[ArcCos[(a^(1/3) + (1 - Sqrt[3])*b^(1/3)*x)/(a^(1
/3) + (1 + Sqrt[3])*b^(1/3)*x)], (2 + Sqrt[3])/4])/(5*3^(1/4)*a^(4/3)*e^4*Sqrt[(
b^(1/3)*x*(a^(1/3) + b^(1/3)*x))/(a^(1/3) + (1 + Sqrt[3])*b^(1/3)*x)^2]*Sqrt[a +
b*x^3])
_______________________________________________________________________________________
Rubi in Sympy [A] time = 23.5536, size = 223, normalized size = 0.91 \[ - \frac{2 A \sqrt{a + b x^{3}}}{5 a e \left (e x\right )^{\frac{5}{2}}} - \frac{2 \cdot 3^{\frac{3}{4}} \sqrt{e x} \sqrt{\frac{a^{\frac{2}{3}} - \sqrt [3]{a} \sqrt [3]{b} x + b^{\frac{2}{3}} x^{2}}{\left (\sqrt [3]{a} + \sqrt [3]{b} x \left (1 + \sqrt{3}\right )\right )^{2}}} \left (\sqrt [3]{a} + \sqrt [3]{b} x\right ) \left (A b - \frac{5 B a}{2}\right ) F\left (\operatorname{acos}{\left (\frac{\sqrt [3]{a} + \sqrt [3]{b} x \left (- \sqrt{3} + 1\right )}{\sqrt [3]{a} + \sqrt [3]{b} x \left (1 + \sqrt{3}\right )} \right )}\middle | \frac{\sqrt{3}}{4} + \frac{1}{2}\right )}{15 a^{\frac{4}{3}} e^{4} \sqrt{\frac{\sqrt [3]{b} x \left (\sqrt [3]{a} + \sqrt [3]{b} x\right )}{\left (\sqrt [3]{a} + \sqrt [3]{b} x \left (1 + \sqrt{3}\right )\right )^{2}}} \sqrt{a + b x^{3}}} \]
Verification of antiderivative is not currently implemented for this CAS.
[In] rubi_integrate((B*x**3+A)/(e*x)**(7/2)/(b*x**3+a)**(1/2),x)
[Out]
-2*A*sqrt(a + b*x**3)/(5*a*e*(e*x)**(5/2)) - 2*3**(3/4)*sqrt(e*x)*sqrt((a**(2/3)
- a**(1/3)*b**(1/3)*x + b**(2/3)*x**2)/(a**(1/3) + b**(1/3)*x*(1 + sqrt(3)))**2
)*(a**(1/3) + b**(1/3)*x)*(A*b - 5*B*a/2)*elliptic_f(acos((a**(1/3) + b**(1/3)*x
*(-sqrt(3) + 1))/(a**(1/3) + b**(1/3)*x*(1 + sqrt(3)))), sqrt(3)/4 + 1/2)/(15*a*
*(4/3)*e**4*sqrt(b**(1/3)*x*(a**(1/3) + b**(1/3)*x)/(a**(1/3) + b**(1/3)*x*(1 +
sqrt(3)))**2)*sqrt(a + b*x**3))
_______________________________________________________________________________________
Mathematica [C] time = 1.76565, size = 187, normalized size = 0.76 \[ \frac{2 x \left (-3 A \left (a+b x^3\right )+\frac{i 3^{3/4} \sqrt [3]{b} x^4 \sqrt{\frac{(-1)^{5/6} \left (\sqrt [3]{-a}-\sqrt [3]{b} x\right )}{\sqrt [3]{b} x}} \sqrt{\frac{\frac{(-a)^{2/3}}{b^{2/3}}+\frac{\sqrt [3]{-a} x}{\sqrt [3]{b}}+x^2}{x^2}} (2 A b-5 a B) F\left (\sin ^{-1}\left (\frac{\sqrt{-\frac{i \sqrt [3]{-a}}{\sqrt [3]{b} x}-(-1)^{5/6}}}{\sqrt [4]{3}}\right )|\sqrt [3]{-1}\right )}{\sqrt [3]{-a}}\right )}{15 a (e x)^{7/2} \sqrt{a+b x^3}} \]
Warning: Unable to verify antiderivative.
[In] Integrate[(A + B*x^3)/((e*x)^(7/2)*Sqrt[a + b*x^3]),x]
[Out]
(2*x*(-3*A*(a + b*x^3) + (I*3^(3/4)*b^(1/3)*(2*A*b - 5*a*B)*x^4*Sqrt[((-1)^(5/6)
*((-a)^(1/3) - b^(1/3)*x))/(b^(1/3)*x)]*Sqrt[((-a)^(2/3)/b^(2/3) + ((-a)^(1/3)*x
)/b^(1/3) + x^2)/x^2]*EllipticF[ArcSin[Sqrt[-(-1)^(5/6) - (I*(-a)^(1/3))/(b^(1/3
)*x)]/3^(1/4)], (-1)^(1/3)])/(-a)^(1/3)))/(15*a*(e*x)^(7/2)*Sqrt[a + b*x^3])
_______________________________________________________________________________________
Maple [C] time = 0.043, size = 3303, normalized size = 13.4 \[ \text{output too large to display} \]
Verification of antiderivative is not currently implemented for this CAS.
[In] int((B*x^3+A)/(e*x)^(7/2)/(b*x^3+a)^(1/2),x)
[Out]
2/5*(b*x^3+a)^(1/2)*(-I*A*(1/b^2*e*x*(-b*x+(-a*b^2)^(1/3))*(I*3^(1/2)*(-a*b^2)^(
1/3)+2*b*x+(-a*b^2)^(1/3))*(I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3)))^(1/2
)*((b*x^3+a)*e*x)^(1/2)*(-a*b^2)^(1/3)*3^(1/2)*b-4*A*(-(I*3^(1/2)-3)*x*b/(I*3^(1
/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1
/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x
-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/
2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1
)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^5*b^3*e+10*B*(-(I*3^(1/2)-3)*x*b/(I*3^(1
/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1
/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x
-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/
2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1
)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^5*a*b^2*e+10*B*(-a*b^2)^(2/3)*(-(I*3^(1/
2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+
2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a
*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*Ell
ipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2
)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^3*a*e+20*I*x^4*B*(-(I*3
^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1
/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)
*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)
*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^
(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*(-a*b^2)^(1/3)*3^(1/2
)*a*b*e+4*I*x^3*A*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)
*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(
1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*
x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b
^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2
))*(-a*b^2)^(2/3)*3^(1/2)*b*e-8*I*x^4*A*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+
(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/
2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/
3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*
3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+
1)/(I*3^(1/2)-3))^(1/2))*(-a*b^2)^(1/3)*3^(1/2)*b^2*e+3*A*((b*x^3+a)*e*x)^(1/2)*
(-a*b^2)^(1/3)*(1/b^2*e*x*(-b*x+(-a*b^2)^(1/3))*(I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+
(-a*b^2)^(1/3))*(I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3)))^(1/2)*b+4*I*x^5
*A*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-
a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((
I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3
)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/
2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*3^(1/2)*b^3*
e-10*I*x^5*B*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*
3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3))
)^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a
*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(
1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*3^
(1/2)*a*b^2*e-10*I*x^3*B*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3))
)^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a
*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-
1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*
x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3
))^(1/2))*(-a*b^2)^(2/3)*3^(1/2)*a*e+8*A*(-a*b^2)^(1/3)*(-(I*3^(1/2)-3)*x*b/(I*3
^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)
^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)-2*
b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*EllipticF((-(I*3^
(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/2)+3)*(I*3^(1/2
)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^4*b^2*e-20*B*(-a*b^2)^(1/3)*(-(I*3^(1
/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-a*b^2)^(1/3)
+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*(-
a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*El
lipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2),((I*3^(1/
2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^4*a*b*e-4*A*(-a*b^2)^(
2/3)*(-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*((I*3^(1/2)*
(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))/(I*3^(1/2)+1)/(-b*x+(-a*b^2)^(1/3)))^(1/2)*
((I*3^(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3))/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1
/3)))^(1/2)*EllipticF((-(I*3^(1/2)-3)*x*b/(I*3^(1/2)-1)/(-b*x+(-a*b^2)^(1/3)))^(
1/2),((I*3^(1/2)+3)*(I*3^(1/2)-1)/(I*3^(1/2)+1)/(I*3^(1/2)-3))^(1/2))*x^3*b*e)/x
^2/(-a*b^2)^(1/3)/b/a/e^3/(e*x)^(1/2)/((b*x^3+a)*e*x)^(1/2)/(I*3^(1/2)-3)/(1/b^2
*e*x*(-b*x+(-a*b^2)^(1/3))*(I*3^(1/2)*(-a*b^2)^(1/3)+2*b*x+(-a*b^2)^(1/3))*(I*3^
(1/2)*(-a*b^2)^(1/3)-2*b*x-(-a*b^2)^(1/3)))^(1/2)
_______________________________________________________________________________________
Maxima [F] time = 0., size = 0, normalized size = 0. \[ \int \frac{B x^{3} + A}{\sqrt{b x^{3} + a} \left (e x\right )^{\frac{7}{2}}}\,{d x} \]
Verification of antiderivative is not currently implemented for this CAS.
[In] integrate((B*x^3 + A)/(sqrt(b*x^3 + a)*(e*x)^(7/2)),x, algorithm="maxima")
[Out]
integrate((B*x^3 + A)/(sqrt(b*x^3 + a)*(e*x)^(7/2)), x)
_______________________________________________________________________________________
Fricas [F] time = 0., size = 0, normalized size = 0. \[{\rm integral}\left (\frac{B x^{3} + A}{\sqrt{b x^{3} + a} \sqrt{e x} e^{3} x^{3}}, x\right ) \]
Verification of antiderivative is not currently implemented for this CAS.
[In] integrate((B*x^3 + A)/(sqrt(b*x^3 + a)*(e*x)^(7/2)),x, algorithm="fricas")
[Out]
integral((B*x^3 + A)/(sqrt(b*x^3 + a)*sqrt(e*x)*e^3*x^3), x)
_______________________________________________________________________________________
Sympy [F(-1)] time = 0., size = 0, normalized size = 0. \[ \text{Timed out} \]
Verification of antiderivative is not currently implemented for this CAS.
[In] integrate((B*x**3+A)/(e*x)**(7/2)/(b*x**3+a)**(1/2),x)
[Out]
Timed out
_______________________________________________________________________________________
GIAC/XCAS [F] time = 0., size = 0, normalized size = 0. \[ \int \frac{B x^{3} + A}{\sqrt{b x^{3} + a} \left (e x\right )^{\frac{7}{2}}}\,{d x} \]
Verification of antiderivative is not currently implemented for this CAS.
[In] integrate((B*x^3 + A)/(sqrt(b*x^3 + a)*(e*x)^(7/2)),x, algorithm="giac")
[Out]
integrate((B*x^3 + A)/(sqrt(b*x^3 + a)*(e*x)^(7/2)), x)